function [c correct, poprawne, bledne, skutecznosc, current] = is_correct(correct, poprawne, bledne, skutecznosc, current, dir1, dir2, Y)

if(dir1 == dir2)
    c = true;
    correct = correct +1;
    poprawne = [poprawne Y];
else
    c = false;
    bledne = [bledne Y];
end
skutecznosc = [skutecznosc (correct/current)*100];